home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Belgian Amiga Club - ADF Collection
/
BS1 part 60.zip
/
BS1 part 60
/
Take 2 v1.7c d1.adf
/
Install
< prev
next >
Wrap
Text File
|
1992-01-17
|
4KB
|
203 lines
;Take-2 installation script.
;For use with Commodore Amiga Installer program.
;Date: 14/2/92
(set bootvolume
(getassign "SYS")
)
(if (= bootvolume "Take_2:") ;Abort if booted from Take_2
(abort "ERROR: You MUST boot from the disk which you want Take-2 installed on.")
)
(if (= @user-level 0)
(
(makedir "Work:Take_2"
(infos)
)
(copyfiles
(source "Take_2:")
(choices "Take_2" "SPlayer.doc" "Hints&Tips" "ScenePLayer" "Take_2.conf")
(dest "Work:Take_2/")
(infos)
)
(makedir "Work:Take_2/Pics")
(copyfiles
(source "Take_2:Pics")
(dest "Work:Take_2/Pics")
(all)
(infos)
)
(copyfiles
(source "Take_2:c/ppmore")
(dest "C:")
)
(copylib
(source "Take_2:libs/vidi.library")
(dest "LIBS:")
)
(copylib
(source "Take_2:libs/translator.library")
(dest "LIBS:")
)
(if (NOT (exists "DEVS:narrator.device"))
(copyfiles
(source "Take_2:devs/narrator.device")
(dest "DEVS:")
)
)
(if (NOT (exists "DEVS:parallel.device"))
(copyfiles
(source "Take_2:devs/parallel.device")
(dest "DEVS:")
)
)
(exit)
)
)
(if (= @user-level 1)
(
(set vididir
(askdir
(prompt "Please select a directory for Take-2 files")
(help @askdir-help)
(default "Work:")
)
)
(copyfiles
(source "Take_2:")
(choices "Take_2" "SPlayer.doc" "Hints&Tips" "ScenePLayer" "Take_2.conf")
(dest vididir)
(infos)
)
(set picsdir
(askdir
(prompt "Please select a directory for Take-2 picture files")
(help @askdir-help)
(default "Work:")
)
)
(copyfiles
(source "Take_2:Pics")
(dest picsdir)
(all)
(infos)
)
(copyfiles
(source "Take_2:c/ppmore")
(dest "C:")
)
(copylib
(source "Take_2:libs/vidi.library")
(dest "LIBS:")
)
(copylib
(source "Take_2:libs/translator.library")
(dest "LIBS:")
)
(if (NOT (exists "DEVS:narrator.device"))
(copyfiles
(source "Take_2:devs/narrator.device")
(dest "DEVS:")
)
)
(if (NOT (exists "DEVS:parallel.device"))
(copyfiles
(source "Take_2:devs/parallel.device")
(dest "DEVS:")
)
)
(exit)
)
)
(if (= @user-level 2)
(
(set vididir
(askdir
(prompt "Please select a directory for Take-2 files")
(help @askdir-help)
(default "Work:")
)
)
(copyfiles
(prompt "Copy which Take_2 files to " vididir "?")
(source "Take_2:")
(choices "Take_2" "SPlayer.doc" "Hints&Tips" "ScenePLayer" "Take_2.conf")
(dest vididir)
(help @copyfiles-help)
(confirm)
(infos)
)
(if (askbool
(prompt "Copy picture files to hard disk?")
(help @askbool-help)
)
(
(set picsdir
(askdir
(prompt "Please select a directory for Take-2 picture files")
(help @askdir-help)
(default "Work:")
)
)
(copyfiles
(source "Take_2:Pics")
(dest picsdir)
(all)
(infos)
)
)
)
(copyfiles
(prompt "Copy ppmore to your C: directory?")
(help @copyfiles-help)
(source "Take_2:c/ppmore")
(dest "C:")
(confirm)
)
(set copyopts
(askoptions
(prompt "Please select libraries & devices to be copied to hard disk.")
(help "Existing libraries will be overwritten by newer ones." "If devices exist already, they will be overwritten." @askoptions-help)
(choices "vidi.library" "translator.library" "narrator.device" "parallel.device")
(default 15)
)
)
(if (IN copyopts 0)
(copylib
(source "Take_2:libs/vidi.library")
(dest "LIBS:")
)
)
(if (IN copyopts 1)
(copylib
(source "Take_2:libs/translator.library")
(dest "LIBS:")
)
)
(if (IN copyopts 2)
(if (NOT (exists "DEVS:narrator.device"))
(copyfiles
(source "Take_2:devs/narrator.device")
(dest "DEVS:")
)
)
)
(if (IN copyopts 3)
(if (NOT (exists "DEVS:parallel.device"))
(copyfiles
(source "Take_2:devs/parallel.device")
(dest "DEVS:")
)
)
)
(exit)
)
)